home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 34
/
Tiger_Disk_034_1997-01_Tiger-Crew-Disk_de_Side_B.d64
/
kleines ende
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
468b
|
12 lines
10 poke52280,.:poke53281,.:printchr$(147):poke646,5:
20 fori=0to99: print"[158]>>>> [129] [146]en[156]de[150] [154] <<<<< [153] [145][145][145] ";
21 nexti:poke56325,1
22 fori=0to41:print" [157][157][157][157] e n d e [157] [145][145][145] ";
23 nexti:poke56325,58:poke646,3
25 fora=1104to1183step.5:pokea,221:forb=22to24step9:poke53270,b:
30 nextb,a
40 forj=399to440step.3:poke1025+j,249:
50 poke55296+j,(rnd(0)*15)
60 print"[145][145][145] es ist vorbei! " :next
70 print"[147] ";